home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / Anwendun / Pov / POV302 / SCENES / MATH / MONKEY.POV < prev    next >
Encoding:
Text File  |  1993-09-27  |  1.2 KB  |  57 lines
  1. // Persistence Of Vision raytracer version 2.0 sample file.
  2.  
  3. // By Alexander Enzmann
  4.  
  5. /* sample quartic scene file written by Alexander Enzmann */
  6.  
  7. #include "shapes.inc"
  8. #include "colors.inc"
  9. #include "textures.inc"
  10.  
  11. #declare Basic_Saddle =
  12. quartic {
  13.  < 0.0,  0.0,  0.0,  1.0, 0.0,  0.0,  0.0,  0.0,  0.0, 0.0,
  14.    0.0,  0.0, -3.0,  0.0, 0.0,  0.0,  0.0,  0.0,  0.0, 0.0,
  15.    0.0,  0.0,  0.0,  0.0, 0.0,  0.0,  0.0,  0.0,  0.0, 0.0,
  16.    0.0,  0.0,  0.0, -1.0, 0.0 >
  17. }
  18.  
  19. #declare Unit_Cube =
  20.    box {
  21.       <-1, -1, -1>, <1, 1, 1>
  22.       texture { pigment { Clear } }
  23.    }
  24.  
  25. /* Monkey Saddle */
  26. intersection {
  27.    object {
  28.       Basic_Saddle
  29.  
  30.       texture {
  31.          pigment { Red }
  32.          finish {
  33.             specular 1.0
  34.             roughness 0.05
  35.             ambient 0.2
  36.             diffuse 0.8
  37.          }
  38.       }
  39.    }
  40.  
  41.    object { Unit_Cube scale 2 }
  42.  
  43.    bounded_by { box { <-2.5, -2.5, -2.5>, <2.5, 2.5, 2.5> } }
  44.  
  45.    rotate 20*y
  46.    rotate -30*x
  47. }
  48.  
  49. camera {
  50.    location  <0.0, 0.0, -10.0>
  51.    right     <4/3, 0.0,  0.0>
  52.    up        <0.0, 1.0,  0.0>
  53.    direction <0.0, 0.0,  1.0>
  54. }
  55.  
  56. light_source { <200, 30, -300> colour White }
  57.